(x-selection-timeout): Use 20000 as default.

diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index 807aa5e2bf4dfc3fbb220466e5f6e13e589de92d..8b3b49cd87fe50d3b1ff5df59faee1daef3d0c6c 100644 (file)
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -574,7 +574,7 @@ This returns ARGS with the arguments that have been processed removed."
 ;; Set x-selection-timeout, measured in milliseconds.
 (let ((res-selection-timeout
        (x-get-resource "selectionTimeout" "SelectionTimeout")))
-  (setq x-selection-timeout 5000)
+  (setq x-selection-timeout 20000)
   (if res-selection-timeout
       (setq x-selection-timeout (string-to-number res-selection-timeout))))